club 

commodore 



nnnnnnnnnnnnnnnnnnnnnnnn 

Boletfn informativo para los 
usuarios de microordenadores 



VIC y CBM 

□□□□□□□□□□□□□□□□□□nnnnnn 



editorial: 
hemos superado 
el milenario 

(pag. 1) 

diseho 

de filtros para 

altavoces 

(pag. 3) 



grabacion 
de datos en 
cassette 

(pag. 10) 



software de 
base: tecnicas 
de ordenacion 
en memoria 

(pag. 14) 



W/E. 



marzo 1 
1983 




estructura de las 
cabeceras de variables 
y "arrays" (matrices) 

(pag. 1) 

radioaficion: 

RTTY 

para el VIC-20 

(pag. 5) 




9d 



noiswdxa 



CM 






O 



o 

CM 
i 

o 
> 

-i 

LU 
Q 

< 

LU 

D 


(0 
LU 



CM 



=5 

o 



O 




G 



club commodore 



EDITORIAL 



ihemos 



el milenario.,.! 



..•De suscripciones, clam. En estos 
momentos el numero de lectores habi- 
tuates y sistematicos de "CLUB COM- 
MODORE" supera la cifra de 1.000. 
Esto constituye todo un acontecimiento. 
El respaldo que esto significa para los 
que hacemos la Revista (no debe olvi- 
darse que YA tenemos colaboraciones, 
aunque POCAS) es algo que queremos 
agradecer efusivamente. 

Y ahora jbasta de sentimentalismos! 
Desde un punto de vista practico tene- 
mos algo que significara una buena no- 
ticia para nuestros lectores: hemos de- 
sarrollado un programa que permite 
(suponemos) acabar definitivamente 
con los problemas causados por los lis- 
tados y su lectura. Para mas detalles 
sobre esta novedad vease el articulo: 
NUEVOS LISTADOS EN "CLUB COM- 
MODORE". 

Otra importante caracteristica de 
este numero 6 es la de que iniciamos la 
insercion de publicidad de los distribui- 
dores y suministradores de software 
para los Ordenadores Personates 
COMMODORE. Aunque pueda parecer 
un tema frivolo este de la publicidad tie- 
ne su importancia pues es el mejor me- 
todo para conseguir el objetivo principal 
de nuestra Revista, que es ni mas ni 
menos que el de suministrar al usuario 
un canal de informacion lo mas comple- 
te posible sobre TODAS LAS ACTIVI- 
DADES que se desarrollen en torno al 
equipo del que es poseedor. 

Una nota final para los que nos remi- 
ten cartas con consultas de todo tipo: 
nos resulta totalmente imposible, dado 
el volumen de correspondencia que re- 
cibimos, contestar personalmente cada 
cuestion. Rogamos a nuestros corres- 
ponsales que tengan paciencia pues 
muchas de las consultas tienen contes- 




tacion casi automatica en la Revista al 
tratarse de temas que, o bien estan en 
preparacion, o van a aparecer en un fu- 



turo muy proximo. En resumen: discul- 
pen las molestias y permanezcan aten- 
tos a la Revista. 
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c b m 



de variables y 






por JOAN CARLES SAMARANCH 



Cj'i este tercer y ultimo articulo de 

organization interna del BASIC de 
"Commodore.', hablaie de los distin- 
tos tipos de variables existentes, ba- 
jo el punto de vista estricto de orga- 
nizacion del sistema, sin entrar en 
planteamientos matematicos bina- 



VARIABLES 

Si directamente creamos la varia- 
ble AB - 1 5, pasamos al monitor 
(SYS 1024) y visualizamos: 

M 0403 0403 



Observando la figura 1.b para va- 

los dos primeros bytes corresponcien 

-: , : .-;-. ■•:. ; - :■ :■ -' ' " : ; ■-■ ; : -- --. 
riable utilizada (S41 = A. =42 = B), 
el siguiente al exponente en formato 

- ■ : ';>;;: 'X;?.t.' -.j ■-<;,;■ 

tes a la mantisa (total 7 bytes). 

- 
SIC— CLRAB- ■ = 15 (variable en- 

Kc )..:-:■: ;/ - :' v a ; : : ':; \\ d 
■ ■' ■>:;)- y 

0403 CI C2 00 OF 00 00 00 AA 

Los dos primeros bytes correspon- 

■■".■:■ ■■: ■?■; ■'-:■■■::■;'':■ •"■■■ y ./ ■>:::■■>;:,.-:. 
en curso mas 128 (S80) y los dos si- 
guientes al valor de la variable em- 
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c) 



estructura die ' 

las cabeceras... 

i:*:Mt: r: y : : >- : : ■ '-■: :: : XXM^yyy^MMyMMyyyMMMywy:^ 

paquetada. Los tres bytes que quedan 
hast.) Ilecjar a siete no se utilizan en 

- ■ ••,■■ 

denas) (fig. 1.c) solo se le suma 128 
al segundo caracter de su nombre, 

' -. . :':-Lf«.-ABi--- , 'C;3!v1" 

.: 0403 41 C2 03FB7F00 00AA 

Tal y como se especificn en la figu- 
ra 1.c el tercer byte es la longitud de 
la cadena y los clos siguientes la direc- 

:'■•.:'■ c~.i ' '■ ' - -.. ;. : ; : . : ;■■, ; 44 :44. 

■ ':■'■■ :■'".'-,;. ■ ~' -r i ■ ^ ■■: ' ;.:l-S^ ; --- -' v--: : i,-- 

"■:>:■ . .-.-- - '... - :.)■■■- '. ; , .- -.:..■ 

4. : ? '.:•. '- ' "_'■.-■.'::■■:■:■:-.■:■ :: -.:.' : :;.. ;£ 

• : ' .'"'•.' ■• ' .:-t;; pc: Hf>te o--;ecr 

.: 7FFB 43 42 4D 05 04 XX XX XX 

v-:: :.■■'.:■? ?'■.■--.-.: . v-,: ; ■ ■ ■..-■;■.- 

■ 44-4. 

Los «arrays<, tambien conocidos 

4'W ;;:•?;•'■:!■: ■ ■: , ■-. ' ::■:■■; -..:-;byc> 
ra y de los distintos elementos de la 

: - 4 

En la cabecera (fig. 2 bl los dos pri- 
meros bytes corresponden al nombre 
de la matriz. Siguiendo el mismo me- 
todo de sumar 123 a uno y/o a otro 
segiin el tipo (ver apartado anterior), 
los dos siguientes bytes son la com- 
posicion de la longitud hasta el inicio 
del siguiente -array- (necesario de- 
bido a gue cada uno es de distinta Ion- .^ 

gitud). El quinto byte corresponde a la 
dimension dada al crearlo o utilizarlo 
por primera vez. Los bytes 6 y 7 co- 

Jiv::ipCi-iC:V:, S; ,:Qr. Vi:( u 4>; :: : .^-V': > ^'X : r. 

de la primera dimension definida con 

5a '--. : --^r'uZ'y,&:; 4444. U- ; y i;\rv : 5? 4 y 4 

indican el numero de elementos de la 

segunda dimension, en caso de exis- 

tir. Si fuera de tres dimensiones, exis- ' 

tirian los bytes 10 y 11. y asi sucesi- 

vamente. Como ya es sabido, pode- L 

mos utilizar matrices sin dimensionar 

siempre y cuando no superemos el in- 

dice 10. o sea 11 elementos (0-10). '4@ 

Pongamos por ejemplo: CLR:AB(0) 
= 1-5, y consultemos al monitor la ca- 
becera y el primer elemento: ei 

'■•. ''■•■-: ■- ."■ i 

,: -m;.;:; 4 4 xi ::■:.;. m y, 44 t;4 y 

■ : 4404 4,.: ::4fK'G0 ........ 

(termma en \a pag siguiente) 
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ELECTR6NICA 



dlseiio de filtros 



por R. PARDO 




tste programa esta concebido para RL (ohmios): valor de la impedancia 

calcular filtros para altavoces de dos del altavoz. 

y tres vias y de 6 6 12 dB/octava in- Ft (Hz): valor de la frecuencia de 

distintamente. corte del filtro (dos vias). 

Los datos que pide el programa son: FT. GRAVES (Hz): valor de la fre- 



6dB/oct 



C1 



Gr Ag 

12dB/oct 




« 



L2: 




Gr Me Ag 



1 



C2 ~ a 



L3 



MM 



cuencia de corte mas grave (tres vias). 

FT. AGUDOS (Hz): valor de la fre- 
cuencia de corte mas aguda (tres 
vfas). 

Todos los resultados vienen dados 
en Henrios y microfaradios. 

FUNCIONAMIENTO 

Las lineas 30-90 Ie piden que elija 
entre un tipo de filtro u otro. Una vez 
elegido, el programa Ie preguntara el 
numero de vias del disefio (lineas 100- 
150/360-420). Hecha la eleccion, el 
programa calcula los valores corres- 
pondientes de L y C y presenta los 
valores (lineas 200-230/300-350/470- 
520/610-710). Sigue el programa, y 
este nos pregunta si deseamos iniciar 
un nuevo disefio, terminar el disefio 
o repetir los resultados anteriores, en 
cuyo caso saldran en pantalla los re- 
sultados que antes habiamos obteni- 
do. Si elige «NUEVO PROYECTO», el 
programa empieza de nuevo; y si no 
se desea seguir, el programa ter- 
mina. 

(termina en la pag. siguiente) 
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^* (viene de pag. anterior) 



FORMULAS 
UTILIZADAS 



DOS VIAS 

Ll=RL/(2*[pi]*FT) 

Cl=l/(2*[pi]*FT*RL) 

Ll=(RL*SQR(2))/(2*lpi]*FT) 

Cl=l/(2*[pi]*FT*RL*SQR(2)) 

L2=RL/(2*[pl]*FT2) 

C2=l/(2*[pi]*FT2*RL) 



MUESTRAS 

DE LOS RESULTADOS 



TRES V(AS 

Ll=RL/(2*[pi]*FTl) 

Cl=l/(2*[pi]*FTl*RL) 

Ll=(RL*SQR(2))/(2*[pi]*FTl) 

Cl=l/(2*[pi]*FTl*RL*SQR(2)) 

L3-(RL*SQR(2))/(2*[pi]*FT2) 

C3=l/(2*[pi]*FT2*Rl*SQR(2)) 



NOTA. — En estas formulas [pi] 
equivale al valor de la variable jr. 



6 dB/Octv. 2 Vias 




RL = 8fi 


L1 


Ft = 4500 Hz 


C1 


3 Vias 




RL= 8Q 




Ft graves = 2000 Hz 


L1 


Ft agudos = 7000 Hz 


L2 




C1 




C2 


12dB/Oct. 2 Vias 




RL = 8Q 


L1 


Ft = 4500 Hz 


L2 




C1 




C2 


12 dB/Oct. 3 Vias 




RL = 8Q 


L1 


Ft graves = 2000 Hz 


L2 


Ft agudos = 7000 Hz 


L3 




L4 




C1 




C2 




C3 




C4 



.282942121 u.H 
4.42097064 u.F 



.636619773 [xH 
.181891364 uU 
9.94718395 uF 
2.84205256 u.F 



.400140585 uH 
.400140585 (xH 
3.12609832 uF 
3.12609832 uF 



.900316317 u.H 
.900316317 |iH 
.257233233 (iH 
.257233233 fxH 
7.03372123 u.F 
7.03372123 uF 
2.00963464 (xF 
2.00963464 u.F 



P0KE36869,PEEK(36869:>+2 

1@ REM FILTRO HLTRVOCES 

20 REM R.PflROO/CLUB COMMODORE/ 16. 10. 1982 

30 PRIHT"C CLR 3 CRVSON3CSHIFF3CSHIFI 3 CSHIFL3 
CSHIFT3CSHIFR3CSHIF03CSHIFS3 CSHIFP3CSHIFH3 
CSHIFR3CSHIFR3 CSHIFR3 CSHIFL3CSHIFT3CSHIFR3 
CSHIFV3CSHIF03CSHIFC3CSHIFE3LSHIFS3CRVSOF3" 



40 PRINT sPRINT" 1-CSHIFF3ILTRO 6DCSHIFB3/OCT 
ftVft" 

50 PRINT :PRINT"2-CSHIFF3ILTRO 120CSHIFB3/0C 
THVfl" 

60 PRINT sPRINT" CSHIFP3ULSE 1 O 2" 

70 GETfl#iIFflS="l"THEN100 

80 IFR*= ,, 2"THEN370 

90 GGTO70 

100 PRIHT-C CLR 31-CSHIFD30S VIAS" 

118 PRINT sPRINT"2-CSHIFT3RES VIRS" 

120 PRINT iPRINT"CSHIFP3ULSE 1 O 2" 

130 GETB*:IFB*="1"THEN160 

140 IFB*="2"TH£N250 

159 GOTO130 

160 PRINT"C CLR 3" :INPUT"CSHIFR;KSHIFL3<OHM 
S>";RL 

170 PRINT: INPUT" tSHIFF3T<ESHIFH3Z >" ;FT 

1S0 Ll=<RL/<2*CCOMMt]*FT>>*1000 

190 Cl = lE+6/<2*r;C0MMt]*FT*RL5 

200 PRINT"C CLR 3CRVSDN3CSHIFC3CSHIFR3i:SHIFL3 
CSHIFC]CSHIFUKSHIFL:CSHIFOJ CSHIFF3CSHIFI3 
ESHIFL3 [SHIFT] CSHIFR3CSHIF03 CRVSOF3" 

210 PRINT sPRINT" CSHIFL3 1 = " ;L1;"UCSH1FH3 ' ' 

220 PRINT sPRINT" CSHIFC31 = ";C1,-"UCSH IFF] " 

230 GOSUB800 

240 GOSUB720:GOTO130 

250 PRINT"C CLR 3" : INPUT" CSHIFR3CSHIFL3 <OHM 
SV';RL 



260 PRINT: INPUT" CSHIFF3T GRRVES< CSHIFH3Z> " ; 

Fl 

270 PRINT:INPUT"CSHIFF3T RGUDOSC CSHIFH3Z?" ; 
F2 

230 Lt*< RL/ < 2# C COUNT M9=i > >*1 E+3 : L2= < RL/ £ 2* C COMMt 1 

*F2))*lE+3 

290 Cl=lE+6/<2*CC0MMT3#Fl*RL> :C2=lE+6/<2*CC0MMt3 
#F2*RL> 

300 PRINT-C CLR 3CRVSON3CSHIFC3CSHIFR3CSHIFL3 
CSHIFC3CSHIFU3CSHIFL3CSHIF03 CSHIFF3CSHIFI3 
CSHIFL3CSHIFT3CSHIFRJCSHIF03CRVSOF3" 

310 PRINT sPRINT" CSHIFL31-" jLl VUCSHIFHJ" 

320 PRINT sPRINT" CSHIFL32= ,, ;L2;"UCSHIFH3 H 

330 PRINT sPRINT" CSHIFC31=";C1;"UCSHIFF3" 

340 PRINT sPRINT" CSHIFC32=" ;C2; "UESHIFF3 " 

350 GOSUB800 

360 GOSUB720:GOTO300 

370 PRINT-C CLR 31-CSHIFD30S VIRS" 

380 PRINT sPRINT"2-ESHIFT3RES VIHS" 

390 PRINT:PRINT"CSHIFP3ULSE 1 O 2" 

400 GETC*:IFC*="1"THEN430 

410 IFC*="2"THEN540 

420 GOTO400 

430 PRINT"! CLR 3" sINPUT"CSHIFR3CSHIFL3<OHM 
S>";RL 

440 PRINT s INPUT" CSHIFF3T<CSHIFHJZ>".sFT 

450 Ll=<<RL*SQRC2>)/<2*CCOMMt3*FT>>»lE+3:L2 
=L1 

460 C 1 = 1 E+6/ < 2* C COMMt 3 *FT*RL*SQR < 2 > > s C2=C 1 

470 PRINT"C CLR 3 CRVSON3 CSHIFC3CSHIFR3CSHIFL3 
ESHIFC3CSHIFU3CSHIFL3CSHIF03 CSHIFF3 CSHIFI 3 
ESHIFL3ESHIFT3CSHIFR3CSHIF03ERVSOF3" 

480 PRINT sPRINT"CSHIFL31=";Ll;"UCSHIFH3" 

490 PRINT sPRINT" CSHIFL32=";L2j "UCSHIFHS" 

500 PRINT:PRINT"CSHIFC31=";C1;"UESHIFF3" 

510 PRINT sPRINT" CSHIFC32=" ;C2; "UCSHIFF]- 

520 GOSU8880 

530 GOSUB720sGOTO470 



540 PRINT"C CLR 3" :INPUT"CSHIFR3 CSHIFL3<OHM 
S>";RL 

550 PRINTsINPUT"CSHIFF]T GRRVESk ESHIFH3Z) ",- 
Fl 

560 PRINT:INPUT"CSHIFF3T RGUDOSC ESHIFH3Z>-; 
F2 

570 Ll = <<RL*SQR<2?>/<:2*CC0MMt3#Fl>>*lE+3:L2 
=L1 

580 L3=<<RL*SQRC2>>/<2*CC0MMt3*F2)>*lE+3sL4 

=L3 

590 Cl=lE+6/<2*CC0MMt3*Fl*RL*SSR<2>>:C2=Ci 

600 C3=lE+6/<2*CC0MMt3*F2*RL*SQR<2>> sC4=C3 

610 PRINT"! CLR 3CRVSON3CSHIFCKSHIFR3ESHIFL] 
CSHIFC3ESHIFU3CSHIFL3ESHIF03 ESHIFF3 ESHIFI3 
CSHIFL3CSHIFT3CSHIFR3CSHIF03CRVSOF3" 

620 PRINT :PRINT" CSHIFL31=";L1; "UESHIFH3" 

630 PRINT sPRINT" CSHIFL32=",-L2;"UESHIFH3" 

640 PRINT .-PRINT" CSHIFL 33=" ;L3; "UCSHIFH] " 

650 PRINT sPRINT" ESH IFL 34=" ;L4; "UCSHIFH3 " 

660 GOSUB800 

678 PRINT :PRINT"CSHIFC31 = , ';C1;"UCSHIFF3" 

680 PRINT sPRINT" ESHIFC32=" ;C2; "UCSHIFF3 " 

590 PRINT :PRINT"CSHIFC33=" ;C3; "UCSHIFF3 " 

700 PRINT sPRINT" CSHIFC34=" ;C4; "UCSHIFF3 " 

710 GOSUB800iGOSUB720:GOTO610 

720 PRINT"! CLR 31-ESHIFR3EPETICION DflTOS" 

730 PRINT :PRINT"2-CSHIFN3UEVO PROVECTO" 

740 PRINTsPRINT"3-C3HIFF3IH DE PROVECTO" 

750 PRINT sPRINT" CSHIFP3ULSE 1,2 O 3" 

760 GETL*sIFLS=""THEN760 

770 K=VflL<L*> :ONKGOTO780,30,790 

780 RETURN 

790 P0KE36S69,PEEKf36S69>-2:END 

800 PRINT:PRINT"CSHIFP3ULSE UNA TECLfl" 

810 GETK*:IFK*=""THEN810 

320 RETURN 

REHDV. 
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RADIOAFICI6N 



para el 



por EA3CIW 




Esta colaboracion, que nos manda EA3CIW, consiste en un pequeno 
programa de recepcion de senates de RTTY aprovechando todo el pro- 
tocolo RS232 que incorpora el VIC-20. 



Eil sistema presentado esta basado 
en los libros THE VIC REVEALED y 
PROGRAMMERS REFERENCE GUIDE, 
en los cuales hay suficiente informa- 
cion para ver el manejo del canal RS 
232 desde BASIC, asi como desde co- 
digo maquina, que es el numero 2; y 
en distintas revistas y publicaciones 
para obtener el alfabeto Baudot y sus 
conversiones. 

En la linea 100 del programa de la 
figura 1 se abre el canal RS232 para 
5 bits, 1 bit de stop, 50 bauds y «half 
duplex». Podemos programar directa- 
mente en el VIC cualquier velocidad 
de transmision de las siguientes: 50, 
75, 110, 134.5, 150, 300, 600, 1200, 1800 
y 2400 bauds, y utilizar desde 5 hasta 
8 bits. Esto quiere decir que por el mis- 



mo metodo, solo cambiando el pro- 
grama, podremos recibir emisiones 
en ASCII a 110 bauds. 

De todas maneras, para poder reci- 
bir correctamente las estaciones de 
radioaficionados que transmiten a 
45.45 bauds, se incorpora la Imea 120 
que modifica la base de tiempos. En 
el caso de querer escuchar estaciones 
profesionales de informacion que 
transmitan a 50 bauds deberemos eli- 
minar esta linea. 

Una de las que mejor se reciben es 
«The Associated Press London» que 
transmite a 50 bauds en la frecuencia 
de 6.985,3 KHz y en «reverse». Esto 
quiere decir que escuchada en LSB 
(banda lateral inferior), como es cos- 
tumbre, el tono agudo corresponde al 



espacio. En la mayorfa de demodula- 
dores se incorpora esta opcion que 
consiste en un simple inversor. 

El resto del programa consta de la 
preparacion de la tabla de conversion 
de los caracteres del alfabeto Bau- 
dot a los normales del VIC-20 (Ifneas 
500-530) y de la parte editora de los 
textos. 

Como es frecuente que haya fading 
y/o ruidos se permite que, pulsando 
la tecla de funcion F2, se pueda cam- 
biar de numeros a letras y viceversa 
durante la recepcion. 

En la figura 2 se muestra el esquema 
de bloques del modulador-demodula- 
dor que ha preparado EA3CIW (Box 
482, Sabadell), que incorpora: "rever- 
se* y/o normal, PTT («push to talk»), 
transmision directa en FSK, si el trans- 
ceptor lo incorpora, y modulador para 
hacerlo vfa audio o en el caso de tra- 
bajar RTTY en FM. Para el trabajo en 
CW utiliza el PTT para manejar la emi- 
sora y el filtro del demodulador para 
la recepcion. ■ 



RTTV-RX 2.2 

10 REM *** RTTV-RX 2,2 ** 
20 REM *** POR EP.3CIW *** 
100 OPEN2,2,2, CHR*<97)+CHR*U63 
: POKE36876, 241 
110 DIM MX<31,1> 

120 POKESS5; 122 : POKES66, 93 : REM* 
BAUDS *** 

300 DP.TR0 , , <53 , 5 1 , 17, 17, 6S , 43 , : 
9, 73, 5S, 85, 53, 13, 13, 68, 42, 82, 55 
510 DRTR74,7,78,44,7'0,35,S7,5e, 
53 , 30 ,43,76,41, 37" , 50 
520 DFITH72, 36, 89, S4, 60, 4B, 81 , 
,63,71,37,8,0,77,46, 88 , 47 , 86 , 6 1 
530 FOR I —0TO3 1 ■ RERDMK (1,0), PIK < ] 
13=0 

1000 DET*2 , Ct : C*=Ct+CHR* < ) 
1010 C=HSC<C*) 

1020 IFC=27THEND=1 ■ GOTO1000 
1 025 I FC=3 1 THEND=0 : OOTO 1 000 
1030 GETRI - IFfl*OCHRt( 134)THEN1 
1035 IFDTHEND=0 : GOTO1040 
1037 IFD=0THEHD=1 
1040 REM 

2000 E=MKCC,D) : IFE=7THEN2100 
2020 I FE= 1 7RHDF= 1 3THEN 1 000 
2050 PR I NTCHR* <E); : F=E : GOTO 1 006 
2100 POKE36878, IS : FORI=1TO100 = 
. - OOTO 1000 



RTTY -CW 
EA3CIW 



6878, 

READS 



i : OET#2, R* 


VIC-20 


sout 












*** 43.43 




FSK 


















32, 32, 83, 3 


RS232 
(TTL) 


• 


FSK in 
AUDIO in 

AUDIO OUt 














9, 79, 57, 66 




MODULADOR 
A F S K 


* 


1,0,0 

I , 1 y ■ NEXT ■ 


S in 


















GND 
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DEMODULADOR 
A F SK 
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PTT 






















PTT 
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SEGUN EQUIPO 



Fig. 1 



Fig. 2 
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los nuevos listados de 
"CLUB COMMODORE" 



por PERE MASATS 



Ein una reunion del nuevo Club de 
Usuarios de Barcelona (por cierto fue 
en la primera) al preguntar la opinion 
de los presentes sobre nuestra Re- 
vista y despues de montanas de elo- 
gios a CLUB COMMODORE (jEJEM!) 
la critica mas energica (y practicamen- 
te la unica) fue dedicada a los lista- 
dos de nuestra Revista y concretamen- 
te a la dificultad de leerlos. En conse- 
cuencia y luego de discutir largamen- 
te el asunto con el Equipo Redactor 



Habitual se ha llegado a dos importan- 
tes conclusiones, a saber: 

PRIMERA. — Hay que hacer algo 
respecto al tema de los listados y 

SEGUNDA y no menos importante: 

LOS CLUBS DE USUARIOS SON MUY 
UTILES PARA OBLIGARNOS A 
AFRONTAR LAS DURAS REALIDADES 
DE LA VIDA MICROINFORMATICA. 



En lo que respecta a la primera, a 
continuacion se presenta nuestra so- 
lucion; y en cuanto a la segunda... 
Los USUARIOS TIENEN LA PALABRA. 

La solucion en principio debe reunir 
ciertas caracteristicas: 

A) El listado debe hacerse a traves 
de un ordenador, no solo por razones 
de presentation sino porque es la ma- 
nera de evitar errores en los listados. 



LIST DE LIST, VERSION ANTIGUA 








500 IFR*= 


""" THENAR "CCOMMT 3' 


: RETURN 


READY. 


510 IFfi*=' 


1 "THENfi*="i: SHIFT]' 


[RETURN 




52B IFfl*=' 


~"THENA*=" CCOMMV3 1 


[RETURN 


3 REM PROGRAMA PARA HACER LISTADOS CCSM 302':-. 


538 IFA*=' 


rTHENM*="[SHIFV3' 


: RETURN 


IS H*="" :X=0 


S4R IFM*= 


- "THENA*="L"COMMU3 ' 


[RETURN 


20 PRINT "CFROORAMA PARA LISTflR PROGPAMAS" 


558 IFA*= 


,"THENfi*s"CSHIFU3' 


[RETURN 


30 INPUT"NOMBRE";S* 


560 IFA*=' 


■"THENA*=" [COMMIT' 


[RETURN 


40 INPUT"CARACTERES" ;E 


570 IFA*=' 


-,"THENH*="[SHIFJ'3' 


[RETURN 


56 OPEN 1 , 9 , 2 , " : " +3** " , S , R " : 0PEN4 , 4 : PR I NT#4 , CHR* ( :■ 


586 IFm*=' 


_" TH£Hfi*=" ECOMM03 ' 


[RETURN 


51 OPEN! 3 , 4 . 1 3 : PR I NT# 1 3 : CLOSE 1 3 


590 IFA*=' 


r"THENA*=" ESHIF03' 


[RETURN 


52 OPEN 1 5 , 4 , 1 5 : PR I NT# 1 5 : CLOSE 1 5 


SOS IFfi*=' 


_"THENfl*=":COriMP3 l 


[RETURN 


60 PR I NT*4," PROGRAMA "+S* 


61a 1FA*=' 


~l"THENA*="i:SHIFP3 l 


[RETURN 


70 PRINT#4,CHR*<:i:i 


620 IFR*=' 


_"THENA*="i:coriMi»:' 


[RETURN 


100 IFST=64THENCL0SE1 :PRINT#4 [CL0SE4 :PUN 


638 IFA*=' 


J"THENfl*='"rSHIF8J' 


[RETURN 


110 GET#i,fl* 


640 IFAS=' 


T'THENH*="CeOMM*3' 


[RETURN 


120 GOSUB170 


650 IFfl*=' 


-"THENH*="nSHIF*:" 


[RETURN 


130 H*=H*+A* 


660 IFfl*=' 


IT " THENA*= " CCQMWt .1 " 


[RETURN 


140 IF':LEH;:Ht)>=B:)OR(A*=CHR*f 13j:jTHENPRINT#4,H*:PPINTH*:H*="" 


670 IFA*=' 


rr"THENfl*="CSHIFt3" 


[RETURN 


1 58 REM 1 FLEN < H* i =BTHENPR I NT#4 . H* : PR I NTH* iH»=" " 


630 JFB*=' 


r" THENflt= " t COMMA 1 " 


[RETURN 


ISO GOTO ISO 


€.90 IFA*=' 


*"THENA*="tSHIFB3 l 


[RETURN 


1. 70 IFA*=" 8" THENA*= " C CRSRO 1 " : RETURN 


700 IFA*=' 


-, "THENfl*="tCOMMS3' 


[RETURN 


1 80 I F A*= " TJ" THENft*= " [ CRSRIJ 3 " : RETURN 


710 IFA*=' 


•"THENA*="[SHIFS1' 


[RETURN 


190 fFft*="»I"THENft*=' , '(:CR'SRft:i M [RETURN 


720 IFA*=' 


."thena*= ,, ccommd:' 


[RETURN 


200 IFA*="||"THENA*=" CCRSRL] " .-RETURN 


730 IFA*=' 


-"thena*="[shifd:" 


[RETURN 


210 IFft*="a"THENfi*="CHOHE ]" [RETURN 


740 I FA*-' 


■ "THeNfi*="CCOf»)F3" 


[RETURN 


220 IFH*="rj"THENfi*="[ CLR 1": RETURN 


750 IFA*=' 


-"THEN(=1*="CSH1FF]" 


[RETURN 


230 IFAf="I"THENfi*="[ BLK 3": RETURN 


760 IFA*=' 


1 "THENB*=" CCOMMG J 1 


[RETURN 


240 IFA*="3"THENA*="[ WHT I" [RETURN 


770 IFR*=' 


I "THENft*="£SHIFG:r 


[RETURN 


250 IFH*="[S"THENA*="L RED 1" [RETURN 


780 IFA*=' 


! "THENA*="CCOHMH]' 


[RETURN 


260 EFfW="| k "THEHfW="t CVN I" [RETURN 


790 IFA*=' 


l"THENfl*="[SHIFH.]" 


[RETURN 


270 IFA*="a"THENA*="[ PUP ]" [RETURN 


300 IFA*=' 


1 "THENfl»="tCOMMJl" 


[RETURN 


2S0 IFA*="iTTHENA*="[ GRH .1": RETURN 


S10 IFR*=' 


"."THENft*="tSHTFJ3" 


[RETURN 


29@ IFfi*="3"THENA*="[ BLU ]" [RETURN 


820 IFB*=' 


1 "THENfl*="CCOHMt<:T" 


[RETURN 


360 IFA*="5i"THEHH*="[ VEL 1" ;RETURN 


830 1FR*=' 


--'" THENfi*= " C SH I FK ]' 


[RETURN 


3 1 IFA*= " a" THENA*= " t R'v'SON 1 " : RETURN 


840 IFA*=' 


l"THENA*=" CCOMMLJ " 


[RETURN 


320 IFA*="I"THENA*=" [RVSQF3 " [RETURN 


850 IFA*=' 


L"THENA*= M CSHIFL3" 


[RETURN 


330 IFft*="B"TMENA*="IIHST I" [RETURN 


860 IFA*=' 


L "THENA*=" i:commz:j " 


[RETURN 


340 I FA* = " a" THENA*= " I CTRL*] " [RETURN 


870 IFA*=' 


♦ "THENAf-=":SHIF2:" 


[RETURN 


350 REMIFA*=" :"THENfl*=" : "+CHR*f 13) 


886 IFti*=' 


-J "THENA*=" CCOMMX3 " 


[RETURN 


360 IFfi*= ,, grTHENA*="[CDMM+3" [RETURN 


890 IFA*=' 


*"thena*="cshif:«:]" 


[RETURN 


37S IFHt="+"THEHfl*="[SHI.F + r' [RETURN 


900 IFA*=' 


■"THENFl*="L"C0MMC3' 


[RETURN 


380 IF8*="1 "THENA*="[COMM-3" [RETURN 


910 IFA*=' 


-"THENfl*=" CSHIFC:" 


[RETURN 


390 IFR*=" |"THENA*="CSHIF-J" [RETURN 


920 IFA$=' 


• "THENA*=" ICGMMVI " 


[RETURN 


400 IFA*="aB"THENAt="CCOMM£]" [RETURN 


930 IFfl*=' 


:>:"THENfl*=" cshifv:" 


[RETURN 


410 IFA*="r"THENA*=" [SWTFE3 " [RETURN 


940 IFR*=' 


■,"THENA*=" [COMMB] " 


[RETURN 


420 I FR*= " I-" THENfl*= " 1." COMMQ 3 " ! RETURN 


950 IFA*=' 


1 "THENA*="[SHIFB]" 


[ RETURN 


430 IFA*="»"THENA*=" [SHIFQ] " [RETURN 


96a IPfl*=' 


l"THENfl*="tCOMMH:" 


[RETURN 


440 IFft*=*M"THEHA#="ECOMMU3" : RETURN 


970 IFB*=' 


,'"THENfi*.= "[SHIFH3" 


[RETURN 


450 IFB*»"0"THEMR*»"tSHIFM]" [RETURN 


980 I FA*-- 1 


l"THENfl*=" CCOMMHJ" 


[RETURN 


460 IFft*="X«THEHB*=" IXOMME] " [RETURN 


990 IFfl*=»" rTHEHfl*="ECOM(1MJ" 


[RETURN 


470 IFfi*="-"THENfi*=":SHIFE3" [RETURN 


1000 IFA*="\" rHEHA*="[SHIFM3 


" [RETURN 


4S0 I FA*= " T " THENR J-= " [ COMMR 3 " i RETURN 


1010 RETURN 




490 IFft»=s"_"TH£Mft»s"tSHI'FR3 " [RETURN 


READY. 
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B) Deben sustituirse todos los 
graficos por algun tipo de mensaje 
que contenga la secuencia de teclas 
con las que se consigue el signo. 

C) Por razones de impresion de la 
Revista debe limitarse el ancho del 
listado para poder «jugar» con los ori- 
ginales y obtener un fotolito lo mas 
claro posible. (Este detalle es el me- 
nos evidente para el lector.) 

D) El listado debe ser facilmente 
«recortable» en diferentes secciones 
por personal sin conocimientos de 
programacion BASIC — por cierto: un 
saludo para ellos — para adaptarlo a 
las necesidades de compaginacion. 

Atendiendo a estos parametros se 
preparo el programa que se ilustra en 
la figura y que se da en las dos formas, 
antigua y actual. 

El funcionamiento del programa es 
el siguiente: en el VIC (o en cualquier 
otro equipo COMMODORE dotado de 
una unidad de discos 4040) se carga o 
escribe el programa que se quiere Ms- 
tar, se corrigen todas las travesuras 
de BUG y, cuando estamos seguros de 
su funcionamiento, hacemos lo que 
sigue: 

OPEN 1,8,2,"0:NOMBREDELPROGRA- 
MA,S,W"y RETURN 

Esto abre en la unidad de disco un 
fichero secuencial en escritura. Lue- 
go: 

CMD1:LISTy RETURN 

Asi listamos el programa en forma 
alfanumerica en el disco, lo que nos 
servira para su manejo posterior por 



nuestro programa. Cuando aparece 
READY tecleamos: 

CLOSE1 y RETURN 

Lo que nos cierra el fichero. Y ya 
tenemos nuestro programa listo para 
ser formateado y convenientemente 
listado. Observese que el programa 
sigue siendo el mismo sin que reali- 
cemos sobre el ninguna copia o alte- 
racion manual. 

Una vez tenemos el programa en 
forma de fichero secuencial en un 
disco de VIC (todo este procedimien- 
to es facilmente adaptable a otros 
equipos COMMODORE), pasamos a 
otro equipo dotado de una impresora 
sofisticada (la CBM 8023) que, entre 
otras cosas, permite la doble impre- 
sion, lo cual mejora los originales pa- 
ra los fotolitos. El equipo 8032 que 
tambien sirve con un programa de pro- 
ceso de texto para la redaccion de los 
articulos de CLUB COMMODORE, es- 
ta conectado a una unidad de disco 
4040 (compatible con el disco del 
VIC) ademas del suyo propio (un 
8050); el 4040 es periferico 9 y el 8050 
es el 8. 

En la CPU 8032 se carga el progra- 
ma que listamos en las dos versiones 
y su ejecucion permite los nuevos lis- 
tados. Veamos como trabaja: 

La linea 10 inicializa las variables, 
la 30 pregunta el nombre del progra- 
ma que tenemos en el disco y quere- 
mos listar. 

La 40 nos pide el numero de carac- 
teres de ancho con que queremos que 
saiga el listado. La 50 abre el fiche- 
ro en la unidad de disco con el nom- 
bre que hemos dado; tambien inicia 
el funcionamiento de la impresora. El 
PRINT #4,CHRS(0) es un resto del 



programa para funcionar con otro tipo 
de impresora y puede eliminarse. Las 
Ifneas 51-52 hacen que la impresora 
golpee dos veces cada caracter, lo 
que mejora la impresion (a costa de la 
velocidad, como es tipico) y en caso 
de utilizar la del VIC pueden elimi- 
narse. La linea 60 imprime al princi- 
pio del listado el nombre del progra- 
ma, lo que es de agradecer cuando se 
manejan unos cuantos originales al 
mismo tiempo. De la linea 70 diremos 
que es otro resto del trabajo con otra 
impresora. 

La linea 100 busca el fin del fichero. 
Si lo encuentra, termina el listado, 
cierra el fichero y vuelve al principio 
del programa por si deseamos otro 
listado. La linea 110 toma un caracter 
del listado en el disco para procesarlo 
como la variable AS. En la linea 120 se 
salta a la subrutina 170 que es la que 
se encarga de sustituir el contenido 
de AS por su equivalente alfanume- 
rico si es un caracter grafico. En la 
linea 130 se «suma» en alfabetico el 
contenido de AS al de HS que es la que 
contiene el resto de la linea actual, 
en 140 si la longitud de HS supera el 
numero de caracteres que hemos asig- 
nado con la variable B o si el caracter 
que acabamos de leer del disco es un 
RETURN (lo que indica que hemos ter- 
minado de leer una linea del progra- 
ma) HS se imprime y el proceso con- 
tinue hasta que ha terminado el pro- 
grama. (La linea 150 es otro resto.) 

La subrutina 170 creemos que se 
explica por si sola. No obstante, por 
razones de presentacion, hemos teni- 
do que usar la terminologia inglesa 
para designar los movimientos del 
cursor al no poder distinguir con una 
sola letra y sin el uso de graficos las 
funciones ARRIBA-ABAJO. 

(continua en la pag. siguiente) 



BOLETIN DE SUSCRIPClON - club commodore 



NOMBRE EDAD 

DIRECCION 

POBLACION ( ) PROVINCIA 

TELEF MARCA Y MODELO DEL ORDENADOR 



APLICACIONES A LAS QUE PIENSA DESTINAR EL EQUIPO 



Deseo iniciar la suscripcion con el n.° 7 



(Enviar a la direccion del dorso) 



DESEO SUSCRIBIRME A "CLUB COM- 
MODORE" POR UN ANO AL PRECIO 
DE 1.980 PTAS., QUE PAGARE CON- 
TRA REEMBOLSO AL RECIBIR EL NU- 
MERO CON EL QUE SE INICIA LA SUS- 
CRIPClON. DICHA SUSCRIPClON ME 
DA DERECHO, NO SOLO A RECIBIR LA 
REVISTA (ONCE NUMEROS ANUA- 
LES), SINO A PARTICIPAR EN LAS AC- 
TIVIDADES QUE SE ORGANICEN EN 
TORNO A ELLA Y QUE PUEDEN SER: 
COORDINAClON DE CURSOS DE BA- 
SIC, INTERCAMBIOS DE PROGRA- 
MAS, CONCURSOS, ETC. 
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los listados de 
CLUB COMMODORE 

(conclusion) 

Otro «resto» de pruebas es la linea 
350, que sin el REM, iniciaba una nue- 
va linea de listado cada vez que se 
encontraba un signo ":" Asf separaba 
las sentencias de una linea, pero los 
resultados no justificaban, a nuestro 
juicio, el «alargamiento» del listado. 

NUEVO TIPO DE LISTADO 

PROGRHMH LIST OE LIST 
RERDV. 

REM PROGRHMH PHRH HHCER LISTRDOS <CBM 80 
23) 

10 H*="" rX=0 

20 PRINT" [ CLR ]PROGRRMR PHRR LI STAR PROGR 
RMRS" 

30 INPUT"NOMBRE";S* 

40 INPUT"CHRRCTERES";B 

50 OPENl,9,2,"0r"+S*+",S,R" rOPEN4,4 rPRINT# 
4,CHRtC0> 

51 0PEN13,4,13rPRINT#13rCLOSE13 

52 0PEN15,4,15rPRINT#15rCL0SE15 
60 PR I NT#4, "PROGRHMH "+S* 

70 PRINT#4,CHR*(1) 

100 IFST=64THENCL0SE1 rPRINT#4 rCL0SE4 rRUN 

110 GET#1,H* 

120 GOSUB170 

130 H*=H*+H* 

140 IFCLEN(H*»=B)0R(H*=CHR*(13))THENPRINT 
#4,H*rPRINTH*rH*="" 

150 REMIFLEN<H*>=BTHENPRINT#4,H*:PRINTH*rH 

160 GOTO100 

170 IFH*="[CRSRD]"THENfl*="[CRSRD]" :RETLIRN 
180 IFR*=" ICRSRUI "THENH*=" [CRSRU] " rRETURN 
190 IFH*="[CRSRR]"THENfl*="[CRSRR]" rRETURN 
200 IFfl*=" [CRSRL]"THENfl*=" [CRSRL]" rRETURN 



210 IFR*="CHOME ] "THENR*=" [HOME J" rRETURN 

220 IFfl*="[ CLR 3"THEHB*=»C CLR 1" :RETURN 

230 IFR*="[ ELK ]"THENfi*="[ BLK I":RETURN 

240 IFfl*="[ WHT ]"THENR*="[ WHT 3" rRETURN 

250 IFfl*="[ RED ]"THENfl*="[ RED I" : RETURN 

260 IFH*="[ CVN 3"THENH*=" : CVN 1" rRETURN 

270 IFH*="[ PUR 3"THENfl*="[ PUR 1" rRETURN 

280 IFR*="[ GRN J"THEMB*»"t GRN 3 "rRETURN 

290 IFfl*="[ BLU ]"THENR*="[ BLLI 1" [RETURN 

380 IFH*="[ VEL ]"THENR*="[ VEL ]" rRETURN 
310 IFH*="[RVSON]"THENfi*="[RVSONJ" rRETURN 

320 ifh*="[rvsof]"thenr*="[rvsof]" jRETURN 

330 IFfi*="[INST ]"THENfl*="[INST 1":RETURN 
340 IFR*="[CTRL<-3"THENH*="[CTRL<-3" rRETURN 
350 REMI FH*= " : " THENfl*= " : " +CHR* C 1 3 > 
360 IFfl*="[COMM+3"THENR*="[COMM+3" rRETURN 
370 IFfl*="tSHIF+]"THENfl*="[SHIF+]" rRETURN 
380 IFfi*="[COMM-]"THENfl*=" [COMM-3" rRETURN 
390 IFfi*=" [SHIF- 3 "THENfl*=" [SHIF-3 " rRETURN 
400 IFR*="[COMM£3"THEHfi*="[COMM£3" rRETURN 
410 IFR*="[SHIF£3"THENfl*="[SHIF£]" rRETURN 
420 IFHI="[COMMQ3"THENH*="[COMMQ3" rRETURN 
430 IFfl*="[SHIFQ3"THENH*="[SHIF03" rRETURN 
440 IFfl*="[COMMU3"THENR*="[CGHHW3" rRETURN 

450 ifh*="[shifw3"thenr*="[shifw3" rreturn 

460 i fr*= " [ comme 1 " thenh*= " c comme 3 " rreturn 

470 i fr*= " [ sh i fe 1" thehr*= " [ sh i fe 1 " r return 

480 ifr*=":commr:"thenr*="[commr:" : return 

490 IFfl*="[SHIFR3"THENR*="[SHIFR3" rRETURN 

500 IFfl*="[COMMT3"THENH*="[COMMT3" rRETURN 

510 IFR*=" [SHIFT3 "THENR*=" [SHIFT] " rRETURN 

520 IFH*=" [COMMVI "THENR*=" [COMMV3 " rRETURN 

530 IFH*="[SHIFV3"THtNfl*="[SHIFV3" rRETURN 

540 IFfi*="[COMMU3"THENfl*="[COMMU3" rRETURN 

550 IFR*="[SHIFU3"THENH*=""[SHIFU3" rRETURN 

560 I FR*= " [ COMM I 3 " THENH*= " [ COMM I 3 " r RETURN 

570 IFR*="[SHIFI3"THENfl*="[SHIFI3" rRETURN 

580 I FR*= " [ COMMO 3 " THENfi*= " [ COMMO I " r RETURN 

590 IFR*"="[SHIF03"THENH*="[SHIFO]" rRETURN 

600 I FR*= " [ COMMP 1 " THENR*= " [ COMMP I " r RETURN 

610 IFR*="[SHIFP]"THENH*="[SHIFP3" rRETURN 
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620 


IFR»= 


'[COMM!?3"THENfi*= 


'[COMMU]' 


rRETURN 


630 


IFR*= 


'[SHIFI>3"THENR*= 


'[SHIFI>]■ 


rRETURN 


640 


IFR*= 


'[COMM*3"THENR*- 


'[COMM*]' 


rRETURN 


650 


IFR*= 


■[SHIF*3"THENfl*= 


'[SHIF*]' 


rRETURN 


660 


IFH*= 


■[COMMT3"THENR*= 


'[COMMT-]' 


rRETURN 


670 


IFR*= 


'[COMMT]"THENH*= 


'[SHIFt]' 


rRETURN 


680 


IFR*= 


■[COMMR]"TKEHR*= 


'[COMMR]' 


rRETURN 


690 


IFH*= 


'[SHIFfl]"THENfl*= 


'[SHIFH]' 


rRETURN 


780 


IFH*= 


'[COMMS3"THENR*= 


'[COMMS] 1 


rRETURN 


710 


IFH*= 


'CSHIFS]"THENH*= 


'[SHIFS]' 


rRETURN 


720 


IFH*= 


'[COMMD3"THENH*= 


'[COMMD]' 


rRETURN 


730 


IFR*= 


'[SHIFD3"THENR*= 


'[SHIFD]' 


rRETURN 


740 


IFH*= 


'[COMMF3"THENR*= 


'[COMMF]' 


rRETURN 


750 


IFR*= 


'[SHIFF3"THENH*= 


'[SHIFF] 1 


rRETURN 


760 


IFR*= 


, [COMMGI"THENRt" 


'[COMMG]' 


rRETURN 


770 


IFH*= 


'[SHIFG3"THENR*= 


'[SHIFG]' 


rRETURN 


788 


IFfl*= 


'[COMMH3"THENR*= 


■CCOMMH]' 


rRETURN 


790 


IFH*= 


'[SHIFH3"THENR*= 


'[SHIFH]' 


rRETURN 


800 


IFR*= 


'[COmmj:"thenr*= 


' [COMMJ]' 


rRETURN 


810 


IFH*= 


'[SHIFJ]"THENH*= 


'[SHIFJ]" 


rRETURN 


820 


IFR*= 


'[COMMK3"THENfi*= 


'[COMMK]' 


rRETURN 


830 


IFR*= 


'[SHIFK3"THENR*= 


[SHIFK]" 


rRETURN 


840 


IFH*= 


'[COMML3"THENfl*= 


[COMML]" 


rRETURN 


850 


IFH*= 


CSHIFL]"THENfi*= 


[SHIFL]" 


rRETURN 


860 


IFHt= 


'[COMMZ3"THENH*= 


[COMMZ]" 


rRETURN 


870 


IFH*= 


[SHIFZ3"THENH*= 


[SHIFZ]" 


rRETURN 


880 


IFRI= 


[COMMXI"THENH*= 


[COMMX]" 


rRETURN 


890 


IFR*= 


[SHIFXI M THENR*= 


[SHIFX]" 


rRETURN 


900 


IFH*= 


[COMMC3"THENflt= 


[COMMC]" 


rRETURN 


910 


IFR*= 


[SHIFCP'THENRt^ 


[SHIFC]" 


rRETURN 


920 


IFflt= 


[COMMV]"THENRI= 


[COMMV]" 


rRETURN 


930 


IFR*= 


[SHIFV]"THENH*= 


[SHIFV]" 


rRETURN 


940 


IFH*= 


[COMME] "THENR*= 


[COMME]" 


rRETURN 


950 


IFRt= 


[SHIFB]"THENR*= 


[SHIFB]" 


rRETURN 


960 


IFH*= 


[COMMN]"THENH*= 


[COMMN]" 


rRETURN 


970 


IFH*= 


[SHIFN3"THENH*= 


[SHIFN]" 


rRETURN 


988 


IFfl»= 


[COMMN]"THENR»=' 


[COMMN]" 


rRETURN 


990 


IFR*= 


[COMMN]"THENR*=' 


[COMMM]" 


rRETURN 


1006 


IFR*= 


"[SHIFM]"THENRt= 


"[SHIFM] 


• rRETURN 


10ie 


RETURN 
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MULTICENTRO DE INFORMATICA 
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!• COMECOCOS. 3,5K. A/R. G/E. JY. EXTRAORDINARY VERSION 
I DEL POPULAR PUCKMAN. COLOR Y MOVILIDAD INSUPERABLE . 

1 • VICGAMON. + 3K. JUEGO DE INTELIGENCIA QUE LE MANTENDRA 
I EN TENSION HASTA DERROTAR A SU VIC 

[• ASTEROIDS WAR. 3.5K. C/M. A/R. G/E. JY. ESPECTACULAR BATA- 
I LLA GALACTICA CONTRA LA NUBE PROTONICA EN 3 DIMENSIONES 

I* FROGGER. +3K y 3,5K. C/M. A/R. G/E. JY. ULTIMA NOVEDAD 
I EN EE.UU. CRUZAR EL PELIGROSO RIO Y LA AUTOPISTA SUICIDA 

[• RATMAN. +8K. C/M. A/R. G/E. DE LA BOVEDA CELESTE DES- 
I CENDERAN EXTRANAS RATAS ATOMICAS. ESPECTACULAR ANI- 
1 MACION 

(• SHARK ATTACK. 3,5K. C/M. A/R. JY. EN MEDIO DEL OCEANO 
| SERA ATACADO POR LOS PELIGROSOS TIBURONES. DEFIENDASE 
| CON SU RED ATOMICA 

(• ROX III. 3,5K Y + 8K. C/M. A/R. G/E. JY. DESDE SU SOFISTICADA 
| BASE LUNAR DEFIENDA SU PLANETA DEL ATAQUE DE LOS UFOS 

j« .ULTISOUND SYNTHETIZER. 3,5K. 4UN ORGANO EN SU VIC? 
1 4 CON ACOMPANAMIENTO, BATERIA Y EFECTOS ESPECIALES? . . 



PUERTO RICO, 21-23- MADRID-16 TEL. 250 74 02 -250 74 04 

dore ¥I€"20^^™__ 

•MYRIAD. +3K. C/M. A/R. G/E. JY. LA MAS ESPECTACULAR | 
1.900 AERONAVE PARA DESTRUIR LAS CRIATURAS COSMICAS EN SU 

VIAJE GALACTICO 2.000 I 

1 800 * COSMIADS. 3,5K. C/M. A/R. G/E. JY. VERSION ULTRARRAPIDA 

DEL MUNDIALMENTE FAMOSO JUEGO "GALAXIANS". INCREIBLES 1 

EFECTOS SONOROS 1700 I 

1.800 . BLITZRIEG. 3.5K. C/M. A/R. G/E. JY. DESTRUYA LA CIUDAD 1 

ENEMIGA CON SU BOMBARDERO. 25 NIVELES DE JUEGO 1.600] 

2.000 • DEFENSA. +8K. C/M. A/R. G/E. JY. N.° 1 EN INGLATERRA, I 

COMO GUERRERO GALACTICO DEBE DEFENDER A LOS HUMA- J 

NOIDES CONTRA LOS ENEMIGOS CIBERNETICOS. 9 NIVELES DE ! 

JUEGO. ESPECTACULAR NAVE Y SONIDOS 2.000 I 

1 .900 I 

• VIC PANIC. 3,5K. C/M. A/R. G/E. JY. VERSION DEL POPULAR I 
"SPACE PANIC". ESCALE LAS LADERAS Y HUYA DE LOS MONS- 1 
TRUOS 1-800 

1.900 1 

• SKRAMBLE. 3,5K. C/M. A/R. G/E. JY. ATRAVESANDO LOS TEMI- I 
BLES PASADIZOS INTERESTELARES DESTRUYA LAS BASES ENEMIGAS 1.900 I 

1.800 J 

• 3D LABYRINTH. +8K. C/M. A/R. EXTRAORDINARIO LABERINTO i 
TRIDIMENSIONAL. £SERA CAPAZ DE SALIR DE EL? UNO O VARIOS I 

1 .900 JUGADORES 1 800 f 



SKI-RUN. 3,5K. C/M. A/R. 
PISTAS DE COMPETICION. 
9 NIVELES 



G/E. DESLICESE POR LAS HELADAS 
SLALOM, S/GIGANTE, DESCENSO. 



1.800 



§• FIREBIRD. (SPACE PHREEKS). 3,5K. C/M. A/R. G/E. JY. ANO 
I 3.010. VD. ES EL UNICO SUPERVIVIENTE DE LA BATALLA DE 
I RIGELLIAN. DEBERA COLONIZAR OTRO PLANETA Y LUCHAR 
I CONTRA LAS CRIATURAS GALACTICAS 1 .900 

|» BREAKOUT. 3,5K. CONSIGA DESTRUIR LA PARED DE IADRILLOS 

i MULTICOLORES CON LA BOLA MAGICA. INCLUYE "MASTERMIND". 1.600 

|» AJEDREZ. PRIMERA VERSION EN CASSETTE CON GRAFICOS EN 

I ALTA RESOLUCION. BASTANTES NIVELES DE JUEGO. (STANDARD) . 2.800 

[• SHADOWFAX. INCREIBLES GRAFICOS ANIMADOS. EL CABALLERO 
) DE LAS SOMBRAS EN LUCHA CONTRA LOS JINETES DEL TIRANO 
I INVASOR. (STANDARD) 1.900 

[• SNAKE. COLORIDO, MOVIMIENTOS Y GRAFICOS EXCEPCIONA- 
I LES. VERSION DEL FAMOSO JUEGO DE LAS SERPIENTES (SNAKE). 
4 (STANDARD) 1 .900 

§• VIC PRINT. +8K. EXTRAORDINARIO Y SENCILLO PROCESADOR 
I DE TEXTOS. TABULACION, MAQUETACION, CABECERAS, COPIAS. 
I CASS O DISK 2.000 

!• VIC LABEL. +8K. EN COMBINACION CON VIC PRINT, ELABORA 

I ETIQUETAS PARA DIRECCIONES 1.900 

§• VIC POST. +8K. ELABORA LETRAS Y TEXTOS ESPECIALES EN 

I TAMANO Y FORMA PARA POSTERS, LISTAS DE PRECIOS, ETC. . . 2.900 

(• VIC CALC. HERRAMIENTA DE CALCULO QUE SUSTITUYE AL LAPIZ, 
I PAPEL Y CALCULADORA, REALIZA COMPLEJOS MODELOS FINAN- 
I CIEROS CON POSIBILIDAD DE AJUSTARLO A OTROS PARAMETROS 
* CON SOLO PULSAR UNA TECLA. 16K DE MEMORIA 3.200 



• GOLF. 3,5K. RECORRIDO DE 9 HOYOS PERO ATENCION A LOS OBS- I 
TACULOS: ARBOLES, LAGOS, ETC. INCLUYE VIC MUSIC Y PIANO 1.600 J 

• CARRERA DE BUGGYS. 3,5K. C/M. A/R. G/E. ESPECTACULAR 
RECORRIDO. ACELERADOR. DECELERACION. 9 NIVELES 1.800 J 

• GRIDRUNNER. 3,5K. C/M. A/R. G/E. JY. IMPRESIONANTE VER- I 
SION LLENA DE COLORIDO, MOVILIDAD Y SONIDO DEL POPULAR I 
"CENTIPEDE" 1.900 1 

• HI-RES. 3,5K. GRAN JUEGO DEMO/UTILIDAD PARA REALIZAR 
EN PANTALLA GRAFICOS EN ALTA RESOLUCION. INCLUYE GEN. 
CARACTERES 1.S00 3 

• ABDUCTOR. LAS CRIATURAS COSMICAS DEL PLANETA "ALPHA I" 1 
INTENTARAN SECUESTRAR A LOS HUMANOIDES PARA CONSEGUIR I 
ENERGIA E INTELIGENCIA SUPERIORES. TU MISION SERA DEFEN- 1 
DER TU PLANETA Y DESTRUIR LAS NAVES ABDUCTORAS. (STAN- 1 
DARD) 1.8001 

• TRAXX. VERSION DEL CONOCIDO JUEGO "AMIDAR"; MEZCLA 1 
DEL POPULAR "PACKMAN" Y DEL JUEGO "QUIX". 100% CODIGO | 
MAQUINA. GRAFICOS EN ALTA RESOLUCION. ESPECTACULAR | 
SONIDO Y COLOR. 8K DE MEMORIA 2.000 1 

• VIC BASE. 16K. POTENTE BANCO DE DATOS. 255 CARACTERES, | 
MAS DE 25 CAMPOS. CAMBIO Y LOCALIZACION, SALIDA IM- 1 

PRESORA 3.200 1 

OPCION 3,5K 1 .300 1 

• GRAPHVICS. +3K. ANADE 18 POTENTES COMANDOS PARA PO- 
SICIONAR PUNTOS, DIBUJAR LINEAS Y TEXTOS EN ALTA RESO- I 

LUCION (152X160) 2.2001 

• GRAPH EDITOR & SOFTKEY 24, 3,5K. AMBOS PROGRAMAS PER- 1 
MITEN DISENAR HASTA 64 CARACTERES PARA INCORPORARLOS I 
A SUS PROPIOS PROGRAMAS Y JUEGOS 2.0001 



I • QUIZ-MASTER. +3K. EL MAS ESPECTACULAR AVANCE EDUCATIVO. ">, 
j PERMITE LA CORRECCION Y PUNTUACION DE TODAS LAS RES- 
| PUESTAS QUE RECIBE EL ORDENADOR 

• QUIZ SET-UP. EN TANDEM CON QUIZ— MASTER PERMITE LA ELA- 
I BORACION POR EL USUARIO DE TODO TIPO DE PREGUNTAS Y 
j CUESTIONES EDUCATIVAS O DE ENTRETENIMIENTO, EGB, IDIO- 
I MAS, MATEMATICAS, HISTORIA, GEOGRAFIA, ETC. CREANDO 

UN AGIL Y ATRACTIVO SISTEMA DOMESTICO/EDUCATIVO , 

• FACEMAKER. 16K. CARICATURANDO EL ROSTRO DE SUS COMPA- 
I NEROS Y AMIGOS EL VIC 20 PONDRA A PRUEBA EL VOCABULARIO 
1 Y LA ATENCION DEL NINO 



• NUMBER CHASER. 16K. PROGRAMA PARA PRACTICAS DE MUL- 1 
TIPLICACION CON CARRERAS DE COCHES, ADELANTA, FRENA, 
ACELERA SEGUN LAS RESPUESTAS. 4 NIVELES DE DIFICULTAD . . . 2.000 1 

>3.200 • NUMBER GULPER. 16K. JUEGO EDUCACIONAL DE COMPETICION 

CON NUMEROS PARA SUMA, RESTA, MULTIPLICACION Y DIVISION 2.000 I 

• WE WANT TO COUNT. 16K PROGRAMA PARA NINOS A PARTIR 
DE TRES ANOS, INVASORES, CARRERAS, ETC 2.000 I 

• TWISTER. 16K. JUEGO DE LOGICA Y CONCENTRACION. PUZZLES 
2.000 GEOMETRICOS CON SONIDO Y COLOR 2.0001 



■ VIC REVEALED 2.200 

jj GETTIN ACQUAINTED WITH YOUR VIC 

■ 20 1.800 

» 50 PROGRAMAS LISTADOS I 1 .500 



ASSEMBLER 2.000 

SYNPHON Y MELANCHOLY COMP 1 .800 

50 PROGRAMAS LISTADOS II 1.500 



ZAP ! POW ! BOOM ! 


... 1 .800 1 


VIC INNOVATIVE 


... 2.000 1 


50 PROGRAMAS LISTADOS III 


1.5001 
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ALMACENAMIENTO DE DATOS 





por P. MASATS 

Muchos usuarios nos dirigen consultas respecto a la utiliza- 
cion de cassettes en el VIC. Se quejan de que no pueden escri- 
bir sus datos en el cassette y volverlos a leer, por lo cual dedi- 
camos este arti'culo a los sistemas de grabacion y lectura de 
datos en cinta. Es posible hacer cosas mas sof isticadas de las 
que vamos a describir pero lo que aqui se describe puede ser- 
vir de punto de partida para la experimentacion. 



fcscribir en el cassette es como es- 
cribir en la pantalla excepto que la 
informacion queda inscrita en la cinta 
como series de impulsos. 

Antes de escribir nada en el cas- 
sette, debe abrirse un area de trabajo 
utilizando 0PEN2,1,1,"N0MBRE DEL 
FICHERO". Esto le indica al VIC que 
queremos utilizar el cassette y empe- 
zara la operacion grabando en la cinta 
el titulo (en este caso, "NOMBRE DEL 
FICHERO"). Esta operacion es vital 
puesto que marca el principio del fi- 
chero (el fichero es el conjunto de 
datos que vamos a grabar bajo la de- 
nominacion "NOMBRE DEL FICHE- 
RO"), y tambien asegura que se ha 
puesto en marcha el aparato de cas- 
sette. Tengase en cuenta que el VIC 
puede advertir cuando se ha pulsado 
una tecla en el cassette pero no dis- 
tingue entre PLAY, RECORD, F.FWD 
o REW. De manera que depende del 
usuario el asegurarse de que ha apre- 
tado las teclas correctas al recibir el 
mensaje "PRESS RECORD & PLAY 
ON TAPE". 

E! primer numero despues de OPEN 
dice como nos vamos a referir a los 
datos durante el resto del programa 
y puede ser un numero arbitrario en- 
tre 1 y 127. Este numero designa el 
fichero logico con el que se va a tra- 
bajar. Entendemos por fichero logico 
una zona de memoria (que se asigna 
por el sistema operativo y que suele 



ser de 192 bytes) que sirve de inter- 
medio entre el ordenador y el peri- 
ferico — el cassette en nuestro ca- 
so — . Su funcion es servir de alma- 
cenamiento temporal de los datos 
hasta completar un bloque de dimen- 
siones determinadas por la naturale- 
za del periferico que se vaya a utili- 
zar, dado que en la cinta se graba un 
paquete de 192 bytes. En este "BUF- 



FER" (es el nombre que se suele dar 
a estas zonas de memoria) se van 
guardando los datos generados por el 
programa hasta tener la cantidad ne- 
cesaria. Entonces se graba y se vuel- 
ve a repetir la operacion hasta que el 
programa encuentra la sentencia 
CLOSE y, entendiendo que se han ter- 
minado los datos a grabar, envia los 
que tiene aunque no este lleno. En 
este caso utilizamos el fichero logico 
numero 2, y utilizaremos PRINT#2 pa- 
ra acceder a la unidad de cassette. 
La razon por la que esto es necesa- 
rio es que, con discos e impresoras, 
podemos acceder a varios canales de 
datos diferentes en el curso de un 
mismo programa. 

El segundo numero identifica al pe- 
riferico que queremos utilizar (el nu- 
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mero 1 es la unidad de cassette) y el 
tercero se utiliza para seleccionar 
lectura(O) o escritura(l). La interpre- 
tacion de este tercer numero depen- 
de del periferico utilizado. 

Finalmente, los caracteres entre co- 
millas designan el tftulo del fichero 
de datos que vamos a grabar. Esto es 
util a la hora de leer para asegurar- 
nos de que vamos a leer el fichero 
correcto. 

Durante el comando OPEN, la cinta 
se movera un momento y luego se pa- 
rara. El cassette esta entonces listo 
para recibir datos. En vez de PRINT, 
utilizamos PRINT#2, lo cual envfa el 
dato al periferico especificado en el 
comando de OPEN. Notese la coma 
entre PRINT#2 y la variable. 

En las primeras etapas de practica 
en el uso del cassette es mejor tener 
solo una variable para cada PRINT* 2 
utilizado y asegurarse de que la ins- 
truccion no finaliza en coma o punto 
y coma. Al leer el dato, necesitamos 
un «return» al final de cada variable 
al igual que hemos de apretar RE- 
TURN cuando tecleamos datos en el 
teclado. Esto se escribira en el cas- 
sette al final del dato, suponiendo 
que no le hemos indicado lo contra- 
rio con una coma o un punto y coma. 

Una vez se han escrito todos los 
datos, es esencial decirle al VIC que 
hemos acabado nuestro trabajo con 
la unidad de cassette. Esto se hace 
mediante el comando CLOSE, que se 
asegurara de que los ultimos datos 
estan en la cinta (seria posible que 
aun estuvieran en el VIC esperando 
a ser escritos). En nuestro ejemplo 
utilizamos CLOSE2 para acabar, de 
manera que el numero utilizado sea el 
mismo que el primer numero en el 
comando OPEN. Para operaciones se- 
guras con cassette no esta nunca de 
mas insistir en la importancia del 
CLOSE. 

Imaginemos que hemos preparado 
dos «arrays» en memoria. Cada uno 
de ellos, con 20 valores — NOMS(I), 
contiene los nombres de los amigos, 
y NUM(I) contiene sus numeros de 
telefono. Si queremos grabar esta in- 
formacion en cassette, podemos ha- 
cerlo como sigue: 

1000 OPEN2,1,1,"LiSTIN" 
1010 FORI = 1TO20 
1020 PRINT* 2,NOM$(l) 
1030 PRINT* 2,NUMS(I) 
1040 NEXTI 
1050 CLOSE2 



Ahora tenemos que volver a leer 
los datos. Despues de rebobinar el 
cassette, utilizamos de nuevo el 
OPEN pero ahora en la forma OPEN2, 
1,0,"LISTIN", donde el cero indica que 
queremos leer los datos. Tambien in- 
cluimos el nombre con que grabamos 
el fichero; y el VIC empezara a leer 
el cassette, buscando el titulo con 
que hayamos hecho el OPEN. 

Si el nombre se omite y utilizamos 
OPEN2,1,0 (o incluso OPEN2, puesto 
que el VIC asume que queremos una 
lectura en el cassette si estos para- 
metros no se dan) el VIC trabajara 
con el primer titulo del cassette. 

Una vez encontrado el fichero, los 
datos estan listos para leerse. Utili- 
zamos simplemente INPUT# 2 en lugar 
de INPUT, y nos aseguramos de que 
leemos los datos en el mismo orden 
en que han sido escritos, aunque los 
nombres de las variables no tienen 
por que ser los mismos. O sea que 
para leer la lista de telefonos, pode- 
mos utilizar: 

1000 OPEN2,1,0,"LISTIN" 
1010 FORI = 1T020 
1020 INPUT#2,AS(I) 
1030 INPUT* 2,B$(I) 
1040 NEXTI 
1050 CLOSE2 

Utilizar un PRINT* con diferentes 
variables, de la misma manera en que 
lo hariamos en la pantalla, puede cau- 
sar problemas, pues el cassette no 
tiene manera de identificar donde 
acaba una variable (la parte corres- 
pondiente a cada variable) y donde 
empieza la siguiente. Debe haber co- 
mas entre estas variables y el INPUT 
# debe tener el mismo numero de 
variables que el PRINT* correspon- 
diente. Hasta que se este totalmente 
familiarizado con estos problemas, 
es aconsejable evitar tener mas de 
una variable en cada instruccion 
PRINT*. 

Igualmente, debe tenerse cuidado 
en evitar leer mas alia del ultimo da- 
to escrito — si es necesario utilicese 
un valor especial para sefializar el 
final de los datos (p. ej., 9999) que le 
permita detener el programa en cuan- 
to se lea. Leer mas alia del ultimo 
dato escrito puede causar problemas 
y obtener un mensaje "STRING TOO 
LONG ERROR", incluso si lo que se 
estaba buscando era un numero. 

(pasa a la pag. siguiente) 



micro bit 

Electronica 



En sus paginas ya se han publica- 
do, desde el n.° 1 (febrero 1982): 

• Programas para VIC-20: 

— Generacion de sonido y pro- 
grama para piano 

— Cdlculo de estabilizadores 
con Zener 

— El Despertador 

— El Quinielista. 

• Se han publicado artfculos sobre 
los siguientes temas: 

— Lenguajes de programacion. 

— La ampliation de un ordena- 
dor con los perifericos. 

— Que es y como funciona un 
ordenador personal. 

— Cuadro de ordenadores pro- 
fesionales/personales en el 
mercado espanol. 

— Interfaz para cassette. 

— Cuatro puntos decisivos en 
la eleccion de un ordenador. 

— Los modems. 

— Discos flexibles (floppy disk). 

— Realizacion de un teclado 
ASCII a partir de un hexa- 
decimal. 

— Las nuevas CPUs: arquitectu- 
ras distintas, mas potencia, 
mayor flexibilidad. 

— Serie de articulos sobre los 
microprocesadores con andli- 
sis de todos sus aspectos, en 
forma progresiva. 

— Aplicaciones de microproce- 
sadores: un sistema de sema- 
foros en la via publico, Sis- 
tema de alarma anti-robo, 
Sencilla aplicacion para mo- 
tores de cassette o de jugue- 
tes electricos. 

— Rutinas utiles para la clasifi- 
cacion de datos (SORT). 

— Descripcion de la PIA. 

— Los convertidores analogico- 
digitales y digital-analogi- 
cos. 

— Nuevos equipos operativos 
de burbujas magneticas para 
la investigacion y las aplica- 
ciones industriales. 

— Los cdlculos de puentes de 
medida realizados con micro- 
ordenador. 

— VIC-20 y micros PET/CBM. 

— Disefio y simulacion de un 
proyecto con microprocesa- 
dor, desarrollado con el AIM- 
65. 

— Las impresoras. 

— Temporizador programable. 

• Fichas tecnicas de microprocesa- 
dores y de micro-ordenadores 

Para numeros atrasados y para 
suscripcion anual (1.975 ptas.), 
dirigirse a: 
REDE - Apdo. 35400 - Barcelona 
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grabacion ds datos en cassette 

(conclusion) 



Si se tienen dudas sobre el conte- 
nido de un fichero en concreto, es 
posible extraer los datos grabados ca- 
racter a caracter y verlos a traves de 
la pantalla con el programa siguiente: 

100 OPEN2 
110 GET#2,AS 
120 PRINTAS 
130 GOTO110 

Depurar programas utilizando el 
cassette es, a veces, bastante dificil, 
y hay un truco que permite poner los 
datos en la pantalla, en vez de en el 
cassette, para asegurarse de que la 
estructura es la correcta, sin conver- 
ts el PRINT* 2 en PRINT. Si se cam- 
bia el OPEN del periferico 1 al perife- 
rico 3 (la pantalla) — en otras pala- 
bras, OPEN2,3,1,"NOMBRE DEL FI- 
CHERO" — todos los datos aparece- 
ran en la pantalla, en lugar de en el 
cassette. 

Igualmente es posible imitar la lec- 
tura del cassette utilizando el perife- 
rico (el teclado) en el comando 
OPEN, y simular el INPUT# del cas- 
sette tecleando Ud. mismo los datos 
en el teclado. En este caso le adver- 



timos de que no recibira el «?» nor- 
mal. Aparecera simplemente un cur- 
sor destelleante. 

Debido a la manera en que el cas- 
sette graba los datos no es posible 
escribir paquetes individuales de da- 
tos para actualizarlos. En cambio, to- 
dos los datos deben leerse dentro del 
VIC, realizar los cambios necesarios 
y luego grabarse nuevamente en su 
totalidad. Esto puede resultar algo te- 
dioso pero es la unica manera. La 
totalidad de los datos registrados en 
la cinta desde el OPEN hasta el 
CLOSE se conoce como el fichero de 
datos. 

Puede haber diversos ficheros en 
el cassette, cada uno con un NOM- 
BRE o titulo diferente. Si el VIC no 
encuentra el fichero especificado en 
el comando OPEN de lectura, conti- 
nuara leyendo la cinta hasta encon- 
trar el que esta buscando. Esto puede 
suponer un problema si solo se tienen 
uno o dos ficheros en el programa y 
el VIC procede a leer la totalidad de 
una cinta C90 para un fichero que no 
existe. 

Para evitar leer mas alia del ultimo 
fichero, es posible etiquetarlo como 
el ultimo en la cinta. Para ello utili- 
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zamos OPEN2,1,2,"NOMBRE DEL FI- 
CHERO". 

En otras palabras, sustituimos el 1 
(que indica que queremos escribir un 
dato) por el 2 (que indica que quere- 
mos escribir pero que es el ultimo 
dato que aparecera en el cassette). 
Si el cassette se lee y el fichero que 
buscamos no se encuentra, obtendre- 
mos un error de "FILE NOT FOUND", 
y la busqueda finalizara. 

Dado que el cassette que utiliza- 
mos es identico a los cassettes nor- 
males de audio, es posible escuchar 
la cinta en un reproductor de musica. 
En primer lugar se escucharan unos 
nueve segundos de una serial de au- 
dio pura. Es la serial que sirve para 
sincronizar la operacion de lectura. A 
continuacion, tres segundos de zum- 
bido, que son el titulo de bloque. 
El dato se graba en bloques de 192 
caracteres (que es la razon por la 
cual el cassette se para y se pone en 
marcha mientras esta en uso) y cada 
uno es precedido por una serial de 
sincronizacion y seguido de un zum- 
bido que es el dato. Dado que cada 
bloque esta escrito dos veces por 
razones de seguridad, habra una pau- 
sa allf donde empieza la segunda co- 
pia. 

Un programa tiene la misma es- 
tructura pero esta grabado como un 
largo bloque cuya longitud depende 
de la longitud del propio programa 
aunque seguira habiendo una pausa 
alii donde empiece la segunda copia 
del mismo. 

Si el cassette esta totalmente re- 
bobinado, hay una gran probabilidad 
de que haya hasta diez segundos de 
cinta transparente que no graba, al 
principio de la cinta. Si este trozo es 
de menos de siete u ocho segundos, 
no deberfa haber ningun problema. 
Pero si es demasiado larga, la serial 
de sincronismo, o incluso el bloque 
con el titulo, podrian no quedar escri- 
tos en la cinta del cassette. Esta es 
probablemente la principal causa de 
los fallos del cassette en lectura/ 
escritura puesto que la lectura no 
puede ser realizada sin esa serial de 
sincronizacion y el bloque del titulo. 
La solucion es asegurarse de que el 
cassette esta rebobinado solo hasta 
el final de la cinta transparente cada 
vez que tengamos que grabar datos. 
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BANCO DE PRUEBAS 



el cartucho 



del 
VIC-20 



(yii) 



por PERE MASATS 



Ouando el VIC esta «pensando» una jugada, el logotipo 
de COMMODORE aparece en color rojo. Tambien puede 
verse el numero de movimiento futuro que el VIC esta 
estudiando en la parte derecha de la pantalla. Asimismo 
el movimiento que la maquina esta considerando se puede 
ver en la parte inferior del registro de movimientos. 

Una caracteristica interesante para neofitos en aje- 
drez es la de que, jugando en niveles superiores al 0, al 
llegar el turno del operador si este pulsa las teclas SHIFT 
y/(el signo «?») el VIC aconsejara al usuario el proximo 
movimiento escribiendolo en la parte inferior del registro 
de movimientos. Si el jugador decide aceptar el consejo, 
simplemente debe pulsar RETURN y la indicada por el VIC 
sera su proxima jugada. (Si uno se ffa demasiado de estos 
consejos su ego puede salir perjudicado, pues el VIC tien- 
de a «barrer para casa».) 

Para jugar normalmente se deben entrar las coorde- 
nadas de la pieza que se desea mover y las de la casilla 
de destino separadas por un signo «-». Tambien es posible 
jugar con la palanca para juegos (JOYSTICK). Para ello se 
debe situar sobre la pieza que se desea mover y se debe 
pulsar el boton rojo. Seguidamente se mueve el cursor 
sobre el lugar de destino y se pulsa el boton rojo. Tambien 
pueden realizarse movimientos especiales: ENROQUE: 
solamente es necesario entrar el movimiento del rey, el 
resto se realiza automaticamente; captura EN PASSANT 
se debe entrar el movimiento del peon. 

Si se ha escogido el modo SETUP, aparecera el tablero 
de ajedrez con la casilla inferior izquierda parpadeando, 
con las teclas de movimiento del cursor se situa sobre la 
casilla que se quiere modificar y se procede como sigue: 

— Si se desea eliminar una pieza que esta en esta 
casilla, se pulsa la tecla INST/DEL. 

— Si se necesita poner una pieza en dicha casilla, se 
debe teclear un codigo que es como sigue: K = rey, Q = 
reina, R = torre, B = alfil, N = caballo y P = peon. A con- 
tinuacion de esta letra debe indicarse el color de la pieza: 
B = negra y \N — blanca. Por ultimo, un numero indicara 
al VIC si esta pieza se supone que ha sido previamente 
movida o no: si no ha sido movida y 1 si lo ha sido con 
anterioridad. 
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Cuando se ha completado la configuracion del tablero 
se debe pulsar RETURN y el VIC preguntara: COLOUR TO 
MOVE NEXT (B,W): es decir ^que color es el proximo en 
mover? A lo que se contestara con el codigo ya conocido. 
Seguidamente el equipo pregunta: MOVE NUMBER (NN): 
es decir, el numero de movimiento en el que se establece 
el juego. Este numero se considera por el programa para 
establecer la estrategia segun el desarrollo de la partida. 
A continuacion: YOUR COLOR (B,W): y LEVEL OF PLAY 
(0-6): que son los mismos que en el juego normal. 

Como puede comprobarse facilmente, las caracterfs- 
ticas de este programa lo hacen muy interesante, tanto 
para el aficionado experto en ajedrez como para el prin- 
cipiante. Como ilustracion en las figuras se incluye una 
breve partida. 

A titulo meramente indicativo, los tiempos que invier- 
te el VIC en sus movimientos en funcion del nivel de 
juego son los siguientes: 

0: Respuesta inmediata 

1 : 20 segundos 

2: 1 minuto 

3: 2 minutos 

4: 6 minutos 

5: 40 minutos 

6: 4 horas 



Estos tiempos son muy variables y pueden resultar 
variaciones entre un tercio y tres veces de los valores 
dados anteriormente. 
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SOFTWARE DE BASE (I) 




por E. MARTINEZ DE CARVAJAL 



Ernesto Martinez de Carvajal parece que le ha tornado aficion 
a colaborar en nuestra Revista (un bello ejemplo a seguir, 
por cierto) y se nos ha comprometido a desarrollar una sec- 
cion el solo. Su titulo sera SOFTWARE DE BASE y tratara de 
los problemas de la programacion cuya solucion constituye el 
fundamento sobre el que construir un buen programa. Espe- 
ramos que este tenga el mismo exito que los anteriores arti'cu- 
los de Ernesto. 



Uno de los mas tipicos problemas 
con que se enfrentan los ordenadores 
es la clasificacion de datos y, por lo 
tanto, los «sorts» son uno de los prin- 
cipales elementos constituyentes de 
la familia denominada software de ba- 
se, tanto en las aplicaciones comer- 
ciales o de gestion como cientfficas, 
por lo que se han desarrollado mu- 
chos tipos que, si bien tienen un fin 
comun, cubren las diferentes necesi- 
dades de cada usuario. Los factores a 
tener en cuenta a la hora de escoger 
un metodo de ordenacion son: veloci- 
dad, recursos necesarios, longitud de 
la rutina y sencillez de la programa- 
cion. Los dos primeros son los de 
mas peso. Teniendo en cuenta que el 
VIC es uno de los micros mas rapi- 
dos del mercado, se le puede sacar 
bastante partido en este campo. 

Con este articulo inicio una serie 
destinada a describir y comparar los 
diferentes medios de ordenacion mas 
usuales. En terminos generales se 
pueden agrupar en dos grandes su- 
perfamilias que se acostumbran a de- 
nominar «metodos comparativos» y 
•■metodos distributives-. En la prime- 
ra de ellas, se considera la clave (es 
la parte del elemento que se utiliza) 
como un todo en la comparacion 
mientras que en la segunda se consi- 
dera la clase caracter a caracter o co- 
mo entidades separadas y, entonces, 
la colocacion relativa de un eiemen- 



to durante la ordenacion no depende 
de la magnitud de su clave sino de 
sus caracterfsticas con relacion a un 
modelo dado. Un ejemplo de la prime- 
ra puede ser la ordenacion alfabetica 
de una serie de nombres y, de la se- 
gunda, la ordenacion de una baraja de 
cartas que primero habrfa que sepa- 
rar por palos y despues, dentro de 
estos, por cifras. 

Dentro de la primera superfamilia 
se pueden considerar las siguientes 
familias: 

METODO DE ENUMERACI6N 
O CONTAJE 

La idea de este metodo es muy 
sencilla y se presta muy bien a apli- 
carla manualmente a un grupo de ci- 
fras en un papel. Consiste en contar 
el numero de elementos inferior a 
cada uno de ellos. Al final, el valor 
que nos indique cada uno de los con- 
tadores mas uno, nos dara la posi- 
cion relativa del elemento dentro de 
la tabla. Solo se requiere un espacio 
adicional para un contador por cada 
elemento de la tabla y un tiempo de 
ordenador que no es tan pequeno a 
medida que crece la tabla. 

METODO DE SELECCI6N 

La base de este metodo consiste 
en localizar el elemento mas pequeno 



de la tabla que se separa, de alguna 
manera, del resto. Despues se busca 
el siguiente mas pequeno y asf suce- 
sivamente. 

METODO DE INTERCAMBIO 

La idea de este metodo es ir reco- 
rriendo la tabla a ordenar e ir inter- 
cambiando entre si cada pareja de 
elementos desordenados, repitiendo 
el proceso hasta que no haya ningun 
par de estos. Es uno de los metodos 
mas utilizados, cuando no es muy im- 
portante el tiempo de ordenacion, ya 
que une la sencillez de programacion 
a los pocos recursos adicionales de 
memoria. 

METODO DE INSERCION 

Este metodo se basa en la inser- 
cion sucesiva de nuevos elementos 
en una tabla que va creciendo ordena- 
da. Es decir, se toma un elemento 
cada vez y se inserta en su posicion 
correcta respecto de los elementos 
ya clasificados. 

METODO DE FUSION 

La idea de este metodo es tratar la 
tabla inicial como trozos que se tie- 
nen que intercalar, existiendo tantos 
trozos como rupturas de secuencia 
haya o bien como N trozos de I ele- 
mentos cada uno. A base de fusiones 
sucesivas, se obtienen trozos cada 
vez mas grandes hasta llegar a tener 
la lista totalmente ordenada. 

Paso ahora a detallaros cada uno 
de estos metodos. Este articulo lo 
dedicaremos al primero de ellos: 

CLASIFICACION POR MONTAJE 
O ENUMERACION 

Este es un metodo con poco porve- 
nir, mejor serfa decir ninguno, pudien- 
dose considerar como una via muerta 
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18 REM SUBRUTINH SORT POR NUMERHCION CONTf) 
JE 



38 REM 81 :82 - ERNESTO MTNZ. DE CHRVR.TRL HEO 
RICH 

■fB INPUT "NUM. ELEMENTOS : ";N 

58 DIM TlCK>,T2etO,T3<N} 

68 FOR I = 1TOH:T1CI:) = INT':RHD(B)*100;. jNEXTI 

38 TI:f="000000" 

100 FOR 1=1 TO N-l 

118 FOP T=I+1 TO M 

120 IF IKIKTKJ) THEN T2< I >=T2( I '. + 1 iOQTQ 1 
40 

130 T2< T>=T2CJ> + 1 

140 NEXT J 

150 NEXTI 

155 F0RI = lTON:T3<T2<i:> + i;>=Tia>:NEXTI 

160 T*=TI* 

170 PRINT "TIEMPO ORDENRCION PRRR ";H;" ELEM 
ENTOS : ";MID*<Tt,3,2);":";MID*<:Tt,5,2i 



10 REM SUBRUTINR SORT POR NUMERHCION CONTR 
JE 



30 REM 81:82 - ERNESTO MTNZ. DE CRPVRJRL HED 
RICH 

48 INPUT "NUM. ELEMENTOS i ";N 

50 DIM TKN>,T2<N>,T3<N> 

60 FOR I=1TON:T1<I>=INT<RND<0>*100> :NEXTI 

80 T I *=" 000000" 

90 REM ============== 

100 FOR 1=1 TO N-l 

116 FOR J=I + 1 TO N 

120 IF TlCI»Ti<J5 THEN T2CI )=T2C 15 + 1 :GOTn 1 
40 

130 T2<J>=T2<J>+1 

140 NEXT J 

150 NEXT I 

155 F0RI = lTON:T3i:T2<I) + li=Tl<I) :NEXTI 

15? REM ============== 

160 T*=TI* 

170 PRINT "TIEMPO ORDENRCION PRRH ";N;" ELEM 
ENTOS I ";MID*(T*,3,2);":";MID*<Tt,5,2> 

200 OPEN 4,4:PRINT#4,CHR*';i45 

210 PRINT#4,"TfiBLfl INICIRL CONTADORES TRBL 
fl FINAL" 



220 PRINTS4, 



230 FORI=lTON 

240 PRINT#4,TKI),T2':i),T3CI) 

250 NEXT 

260 PRINT#4 

270 PRINT#4, "TIEMPO ORDENRCION PflRfl ";N;" EL 
EMENTOS ! ",-MID*<T*,3,2>,-":";MIDt<T*,5,2> 



dentro de los metodos de clasifica- 
cion. Si bien, en un principio, todos 
los metodos parten de ideas suma- 
mente sencillas que dan rendimientos 
pobres, son susceptibles de mejoras 
que pueden incrementar notablemen- 
te su rendimiento. Esto no sucede 
con la familia de clasificacion que es- 
tamos considerando pero, teniendo en 
cuenta su sencillez, podemos dedicar- 
le algo de espacio. 

Como os he dicho anteriormente, 
la idea del metodo es que si un ele- 
mento es mayor que otros trece quie- 
re decir que ha de ocupar el puesto 
14 en la tabla ordenada. Asi pues, si 
comparamos cada par de elementos 
y contamos cuantos son menores que 
cada uno en concreto, tendremos un 
metodo de ordenacion en donde el 
contador nos dara, al final, la situa- 
cion relativa que tiene que ocupar 
cada uno de los elementos. El algo- 
ritmo que desarrollaremos debera" te- 
ner en cuenta la posibilidad de que 
haya elementos iguales, lo cual no es 
demasiado dificil teniendo en cuenta 
que si cada par de elementos solo se 
compara una vez y en cada compara- 
cion se incrementa uno u otro con- 
tador, segun un mismo criterio y si- 
guiendo siempre el mismo orden, lle- 
garemos a un resultado final con to- 
dos los contadores distintos aunque 
haya elementos repetidos. En la figu- 
ra aparece el listado de una rutina 
de clasificacion segun este metodo. 

De la observacion de la rutina se 
deduce cual es la principal ventaja 
del metodo, que es su tremenda sen- 
cillez. Por contra, su principal (y defi- 
nitiva) desventaja es su bajisimo ren- 
dimiento a partir de valores de N 
(numero 'de elementos de la tabla) 
relativamente grandes, como podreis 
observar en la tabla resumen que pu- 
blicaremos con el ultimo de los me- 
todos de esta superfamilia. 

El bajo rendimiento se debe a que 
cada elemento se ha de comparar 
con todos los otros, lo cual quiere 
decir que si el tamafio de la lista es 
N se han de hacer N'(N-1)/2 compa- 
raciones, lo cual nos da unos tiempos 
de ejecucion proporcionales a N A 2 (al 
doblar el tamaho de la lista se multi- 
plica por cuatro el tiempo de ejecu- 
cion). El propio sistema seguido en el 
algoritmo nos indica que el metodo 
es completamente insensible a la dis- 
tribucion inicial de los elementos de 
la lista, es decir, su rendimiento solo 
depende del tamafio de la lista, y es 
independiente de la ordenacion ini- 
cial. 



Tabla inicial 


Contadores 


Tabla final 


53 


9 


2 


81 


13 


8 


79 


12 


11 


2 





16 


92 


18 


20 


54 


10 


29 


16 


3 


42 


42 


6 


44 


11 


2 


49 


49 


8 


53 


98 


19 


54 


8 


1 


68 


87 


16 


79 


29 


5 


81 


44 


7 


81 


20 


4 


86 


81 


14 


87 


87 


17 


87 


86 


15 


92 


68 


11 


98 



Tiempo ordenacion para 20 elemen- 
tos: 0:03. 



Tabla inicial 


Contadores 


Tabla final 


10 


2 


2 


8 


1 


8 


46 


16 


10 


27 


10 


11 


41 


14 


11 


62 


20 


19 


24 


8 


23 


50 


18 


23 


19 


5 


24 


98 


27 


26 


89 


25 


27 


99 


29 


30 


2 





31 


38 


13 


38 


93 


26 


41 


11 


3 


41 


31 


12 


46 


54 


19 


46 


11 


4 


50 


79 


22 


54 


30 


11 


62 


46 


17 


76 


83 


23 


79 


41 


15 


83 


98 


28 


84 


84 


24 


89 


76 


21 


93 


26 


9 


98 


23 


6 


98 


23 


7 


99 



Tiempo ordenacion para 30 elemen- 
tos: 0:07. 



(termina en la pag. siguiente) 
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MARKETCLUB 



• Vendo aplicacion de facturacion con control de representanies, 9 listados, 
6 ficheros, estadisticas, etc., permite copias de seguridad. Configuracion: VIC, 
8K, disco e impresora, 40.000 Ptas. Escribir a Jaime Ameller Pons. General 
Mola, 15, I? B. CALATAYUD (Zaragoza). 

• Vendo interfaz y programa para RTTY y CW para el PET a 15 K. Rafael, 
EA3CGK - Avda. Barcelona, 21 , A, 45 25. IGUALADA (Barcelona). 

• Se busca experto en VIC-20 para colaborar en la creacion y coordination de 
un Club de Usuarios de VIC en Barcelona. Llamar a Srta. Rosa Romero. Tele- 
fono 21 1 54 40. 

• Vendo cartucho 16K VIC-20, por 14.000 ptas. Hago programas en Basic de 
Commodore (todas las versiones) bajo encargo. Desearia contactor con usuarios 
de Commodore en la zona de Madrid, para cambio de programas, impresiones, 
pokes especiales, etc... Razon: Francisco Gutierrez. Santiago Rusinol, 12. MA- 
DRID-3. Telef. (91) 253 13 40. Horas comida y cena. 



tecnicas de ordenacion... 





iSOCORRO 


I'".' 




ema 


del vIC 


1-20 




stante, en la 


dice a que otro (u otro: 




. ectada esta serial. 
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(conclusion) 



Tabla inicial Contadores Tabla final Tabla inicial Contadores Tabla final Tabla inicial Contadores Tabla final 



31 
83 
80 
54 
23 
37 
99 
74 
71 
81 
37 
92 
95 
99 
34 
16 
43 
50 
13 
99 
89 
44 


42 
56 
18 
19 
40 
47 
89 
79 
49 


30 
46 
48 

6 
39 
29 
42 



10 
32 
30 
25 

7 
12 
37 
28 
27 
31 
13 
35 
36 
38 
11 

4 
18 
24 

3 
39 
33 
19 


16 
26 

5 

6 

15 
21 
34 
29 
23 

1 

9 
20 
22 

2 
14 

8 
17 





6 
13 
16 
18 
19 
23 
29 
30 
31 
34 
37 
37 
39 
40 
42 
42 
43 
44 
46 
47 
48 
49 
50 
54 
56 
71 
74 
79 
80 
81 
83 
89 
89 
92 
95 
99 
99 
99 



29 
32 

1 
62 
83 
93 
83 

6 

3 
92 
96 
58 

7 
45 


57 
26 
54 
54 
23 
44 
93 
41 
10 
76 
32 



12 
14 
1 
30 
38 
46 
39 



11 
25 
26 

9 
21 
47 
18 

6 
35 
15 




1 
3 
6 
7 
8 
10 
17 
18 
23 
23 
26 
29 
29 
32 
32 
34 
37 
41 
41 
41 
44 
45 
45 
52 
54 



87 
78 
74 
23 
17 
52 
69 
61 
18 
41 



44 
36 
33 
10 



48 
43 
37 
13 



16 
41 
31 
5 
20 
42 
34 



54 
57 
58 
61 
62 
63 
69 
74 
74 
76 
78 
79 
83 
83 
83 
84 
85 
86 
87 
92 
93 
93 
94 
96 



(pasa a la siguiente) 



Tiempo ordenacion para 50 elemen- 
tos: 0:21. 



Tiempo ordenacion para 40 elemen- 
tos: 0:13. 



NOTICIAS 

los mimeros atrasi 

Dado lei cipabullante demai 
esta en estudio lei rdicion en f 
(el 0, el 1, el 2 y el 3) para ev 
somos muy previsores hemos re: 
edicion. Para informacion de lo 
do los numeros 4 y 5 (y natural 



CO 



CO 






u 



o 

CM 

i 

o 
> 

j 

LU 
Q 






U 



LU 

D 


W 

LU 
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PROGRAMAS VIC-20 



Ref. 






: ,_ 



P.V.P. 

Ptas. 



Ref. Programa 



P.V.P. 
Ptas. 



Ref. Programa 



P.V.P. 
Ptas. 



Libro curso de intro\>„>.i_.o.i a, , Ac 

Parte I 2.500 

Con dos cintas o un disco. 

Libro curso de introduction al Basic 

Parte II 2.500 

Con dos cintas o un disco. 

D-1001 Agenda 5.000 

Necesita ampliacion de 8K. 

D-1002 QSL 3.000 

Necesita ampliacion de 8K. 

D-1003 Test Demo 3.000 

D-1004 Assembler 5.000 

Necesita ampliacion de 3 K. 

CINTAS PARA CASSETTE 

C-125 Hangmath 1.500 

No necesita ampliacion. 
C-128 Programacibn lineal 500 

No necesita ampliacion. 
C-129 Matrices 500 

No necesita ampliacion. 
C-130 Caja 1.500 

Necesita ampliacion de 16K 
C-131 Regresiones I 500 

No necesita ampliacion. 
C-132 Regresiones II 500 

No necesita ampliacion. 
C-133 Estadistica I 500 

No necesita ampliacion. 
C-134 Estadistica II 500 

No necesita ampliacion. 
C-135 Sistemas 500 

No necesita ampliacion. 
C-136 Dieta 1.500 

Necesita ampliacion de 8K. 
C-137 Integration 500 

No necesita ampliacion. 
C-139 Vicalc 1.500 

No necesita ampliacion. 
C-140 Skymath 1.500 

Necesita ampliacion de 3K. 
C-141 Space Division 1.500 

Necesita ampliacion de 3K. 
C-142A Interface y programa CW 25.000 

No necesita ampliacion. 
C-142B Programa RTTY 2.500 

No necesita ampliacion. 
C-143 English Language 2.000 

Necesita ampliacion de 8K. 
C-144 Quiz Master 2.000 

Necesita ampliacion de 8K. 
C-145 Mastermind 3.000 

Necesita ampliacion de 8K. 

Ademas para esta cassette 
se estan preparando los si- 
guientes temas: 



C-145A 


Gastronomia 


1.500 


C-145B 


Musica 


1.500 


C-145C 


Cinematografia 


1.500 



C-145D Deportes 

Etc... 
C-201 Codemaker 

No necesita ampliacion. 
C-202 Wall Street 

No necesita ampliacion. 
C-203 Simple Simon 

No necesita ampliacion. 
C-204 Damas 

No necesita ampliacion. 
C-205 Alien Blitz 

No necesita ampliacion. 
C-206 Kosmic Kamikaze 

Necesita ampliacion de 3 

u 8K, dado que hay dos 

versiones del juego. 
C-207 Star Wars 

No necesita ampliacion de 

memoria. 
C-208 Amok 

No necesita ampliacion. 
C-209 The Alien 

Necesita ampliacion de 3K. 
C-210 Invader Fall 

No necesita ampliacion. 
C-211 A-MAZ-ING 

Necesita ampliacion de 3K. 
C-212 Math-Hurdler, Monster 

Maze 

No necesita ampliacion. 
C-213 Golf 

Necesita ampliacion de 3K. 
C-215 VIC GAMES II 

No necesita ampliacion. 

JUEGOS EN CARTUCHO 

1904 Super Slot 

Se juega por teclado o con 
Joystick. 

1906 Super Allien 

Se juega por teclado o con 
Joystick. 

1907 Jupiter Lander 

Se juega por teclado. 

1908 Draw Poker 

Se juega por teclado. 
1901 Avenger 

Se juega por teclado o con 
Joystick. 

1909 Road race 

Se juega por teclado. 

PROGRAMAS PROFESIONALES 

Z0001 Contabilidad S/V-20 

Stock-VIC 
V0501 Control peliculas para 

Video-Clubs 
Z0601 VIC/Entrapunt 

Nota: Para mas detalles so- 
bre estos programas con- 
sular. 



1.500 
1.500 
1.500 
1.500 
1.500 
1.500 
1.500 

1.500 

1.500 
1.500 
1.500 
1.500 

1.500 
1.500 
1.500 

4.500 

4.500 

4.500 
4.500 
4.500 

4.500 



NOVEDADES ENER01983 



PROGRAMAS EN CINTA: 

C-146 Matematicas 1 (nivel BUP) 2.000 
Necesita ampliacion de 8 
6 16K. 



C-216 Escape 

No necesita ampliacion. 

C-217 Biocomp 

Necesita ampliacion de 3K. 

C-218 Cubo VIC 

No necesita ampliacion. 

C-219 Type a tune 

No necesita ampliacion. 



PROGRAMAS EN CARTUCHO 

1911 

1902 



The sky is failling 

Es necesario utilizar Paddle. 



1.500 
2.000 
1.500 
2.000 

4.500 
4.500 



1919 

1924 

C-400 
C-401 
C-402 

1912 

1909 

C-403 
C-404 



Star battle 

Se juega con teclado o con 
Joystick. 

Sargon II chess 4.500 

Se juega con teclado o con 
Joystick. 

Omega race 4.500 

Se juega con Joystick. 



VIC FORTH 
VIC STAT 
VIC GRAPH 



consultar 
consul tar 
consultar 

4.500 



Mole attack 

Solo para teclado. 

Radar ratrace 4.500 

Se juega con teclado o con 
Joystick. 

WORDCRAFT-VIC 42.500 

(compatible series CBM8000 
y CBM 4000) 

VIC SCREEN MASTER 10.000 



PROGRAMAS EN DISCO 

D-1005 English Language 2.500 

Necesita ampliacion de 8K. 

D-1006 Quiz master 2.500 

Necesita ampliacion de 8K. 

D-1007 Matematicas I 2.500 

(nivel de BUP) 
Necesita ampliacion de 8K. 

D-2000 VIC WRITER 13.000 

Necesita ampliacion de 8K. 

D-2001 SIMPLICALC 13.000 

Necesita ampliacion de 8K. 

D-2002 VIC FILE 13.000 

Necesita ampliacion de 8K. 
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